home *** CD-ROM | disk | FTP | other *** search
/ Run Magazine ReRun 1991 March & April / rerun-1991-03-04.d64 / dir display (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  892b  |  18 lines
  1. 100 rem display directory
  2. 105 fort=0to179:reada:poke50764+t,a:next
  3. 110 data 160,0,162,1,32,198,255,32,197,198,32,207,255,141,253,198
  4. 115 data 32,207,255,13,253,198,208,15,206,255,198,96,32,197,198
  5. 120 data 32,207,255,208,3,76,100,198,32,197,198,32,207,255,72
  6. 125 data 165,144,240,7,104,32,204,255,76,100,198,32,225,255,208
  7. 130 data 7,104,32,204,255,76,100,198,32,204,255,152,72,32,228,255
  8. 135 data 240,5,32,228,255,240,251,104,168,162,1,32,198,255,104
  9. 140 data 201,34,208,202,32,207,255,201,34,240,7,153,0,199,200,76
  10. 145 data 172,198,32,203,198,32,207,255,208,251,76,86,198,32,207,255
  11. 150 data 76,207,255,173,255,198,208,6,238,255,198,76,245,198,140
  12. 155 data 253,198,169,40,56,237,253,198,74,170,169,32,32,210,255,202
  13. 160 data 208,250,169,0,153,0,199,169,0,160,199,32,30,171,169,13,32
  14. 165 data 210,255,160,0,96,0,0,0
  15. 170 print"display directory is active"
  16. 175 print"use the following syntax:"
  17. 180 print"open 1,8,0,"chr$(34)"$"chr$(34)":sys 50764:close 1"
  18.